Namespace BEL.Servicio
	<Serializable()> _
	Public Class Reserva
		Implements System.IDisposable

#Region "Variables privadas"
		Private _co_reserva As System.Int32
		Private _fe_reserva As System.DateTime
		Private _fe_horainicio As System.DateTime
		Private _fe_horafin As System.DateTime
		Private _no_estado As System.String
		Private _titular As BEL.Servicio.Natural
		Private _asistencia As BEL.Servicio.Asistencia
		Private _EsNuevo As System.Boolean
#End Region
#Region "Constructor"
		Public Sub New()
			Me._co_reserva = 0
			Me._fe_reserva = [Date].Now
			Me._fe_horainicio = [Date].Now
			Me._fe_horafin = [Date].Now
			Me._no_estado = [String].Empty
			Me._titular = New BEL.Servicio.Natural
			Me._asistencia = New BEL.Servicio.Asistencia
		End Sub
#End Region
#Region "Propiedades"
		Public Property CO_RESERVA() As System.Int32
			Get
				Return _co_reserva
			End Get
			Set(ByVal value As System.Int32)
				_co_reserva = value
			End Set
		End Property
		Public Property FE_RESERVA() As System.DateTime
			Get
				Return _fe_reserva
			End Get
			Set(ByVal value As System.DateTime)
				_fe_reserva = value
			End Set
		End Property
		Public Property FE_HORAINICIO() As System.DateTime
			Get
				Return _fe_horainicio
			End Get
			Set(ByVal value As System.DateTime)
				_fe_horainicio = value
			End Set
		End Property
		Public Property FE_HORAFIN() As System.DateTime
			Get
				Return _fe_horafin
			End Get
			Set(ByVal value As System.DateTime)
				_fe_horafin = value
			End Set
		End Property
		Public Property NO_ESTADO() As System.String
			Get
				Return _no_estado
			End Get
			Set(ByVal value As System.String)
				_no_estado = value
			End Set
		End Property
		Public Property TITULAR() As BEL.Servicio.Natural
			Get
				Return _titular
			End Get
			Set(ByVal value As BEL.Servicio.Natural)
				_titular = value
			End Set
		End Property
		Public Property ASISTENCIA() As BEL.Servicio.Asistencia
			Get
				Return _asistencia
			End Get
			Set(ByVal value As BEL.Servicio.Asistencia)
				_asistencia = value
			End Set
		End Property
#End Region
#Region "IDisposable Members"
		Public Sub Dispose() Implements IDisposable.Dispose
			GC.Collect()
		End Sub
#End Region
#Region "IGenerico Members"
		Public Property EsNuevo() As System.Boolean
			Get
				Return _EsNuevo
			End Get
			Set(ByVal value As System.Boolean)
				_EsNuevo = value
			End Set
		End Property
#End Region
	End Class
End Namespace